home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / dev / c / vbcc.lha / vbcc / machines / amiga68k / libsrc / math / isnan.c < prev    next >
Encoding:
Text File  |  1997-12-30  |  129 b   |  6 lines
  1. int isnan(double a)
  2. { 
  3.   unsigned long *b=(unsigned long *)&a;
  4.   return (b[0]&0x7ff00000)==0x7ff00000&&((b[0]&0xfffff)||b[1]);
  5. }
  6.